|
Rund um AutoCAD : UMDREH-Funktion für M-Texte?
RoSiNiNo am 02.10.2013 um 16:58 Uhr (1)
Hi, im Anhang nun die Projektdatei. Einfach .dwg entfernen und Projekt.dvb mit VBALAD laden.Diese zwei Funktionen haben noch gefehlt.Wenn ein Fehler bei dir auftritt, dann liegt es daran, dass ich AutoCAD 2014 habe. Dann einfach den Code in ein neues Projekt kopieren oder die Verweise richtig stellen.Code:Public Function CreateSelectionSet(Optional ssName As String = "SS") As AcadSelectionSet Dim objSelSet As AcadSelectionSet Dim objSelCol As AcadSelectionSets Set objSelCol = ThisDrawing.SelectionSets ...
| | In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Koordinaten von Punkten/Objekten mit VBA auslesen
RoSiNiNo am 31.07.2002 um 08:02 Uhr (0)
anbei findest du die vba-prozedur. sie gibt alle gewählten punkte unsortiert in eine textdatei aus. Code: (c)Feletic 31.07.2002 Übergibt Punktekoordinaten in Textdatei und speichert in Zeichnungspfad und Zeichnungsnamen Public Sub Dots_Extract_Text() Dim SS As AcadSelectionSet Dim Filnum As Integer Dim atts As Variant Dim Obj As Object Dim Punkt As AcadPoint Dim Pt(0 To 2) As String Dim Pfad As String Dim DatName As String Dim PfadDatei As String Dim FltType ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Koordinaten von Punkten/Objekten mit VBA auslesen
RoSiNiNo am 31.07.2002 um 10:43 Uhr (0)
die datei hat den namen der zeichnung und wird in dem gleichen ordner wie diese als textdatei abgelegt. man kann natürlich auch den pfad und den namen abfragen, dazu braucht man aber noch weitere prozeduren. kannst du auch haben, wenn du unbedingt möchtest. roland
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Organisation von AutoCAD
RoSiNiNo am 08.08.2002 um 15:59 Uhr (0)
wieso hat nicht jeder user ein eigenes Verzeichnis. jedes mal wenn ein user sein Profil lädt, wird nun mal sein Verzeichnis in den Optionen -- Suchpfad für Supportdateien, an die erste Stelle gereiht. Dann hat jeder user seine Programme die als erstes geladen werden. Roland
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Maße für Bauzeichnungen mal in Meter und mal in cm, wie geht das??
RoSiNiNo am 06.08.2002 um 13:01 Uhr (0)
hallo zusammen, ich habe für unser büro ein kleines vba-tool geschrieben. da wir aber mit einem eigenen maßstabssystem arbeiten, hab ich einfach den code ein wenig geändert. ich hoffe es funktioniert, hab es nicht getestet. die angehängte zip-datei beinhaltet: Bemassung.mns dim-m.bmp, dim-m-h1.bmp, dim-m-h5.bmp, dim-cm.bmp, dim-cm-h1.bmp, dim-cm-h5.bmp, dim-mm.bmp, dim-mm-h1.bmp, dim-mm-h5.bmp CADDE_Bemassung.bas die bas-datei einfach in acad.dvb importieren. das menü bemassung laden, dann soll ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Text - Lisp
RoSiNiNo am 21.08.2002 um 11:41 Uhr (0)
Hallo Mozi, hab so etwas für mich auch einmal unter VBA programmiert. vbaide aufrufen, unter Datei -- Datei importieren..., die Datei vom Anhang laden, Funktion TextCalculate aufrufen. Berechnungen mit Text (=Zahl), Nachkommastellen werden mit dem Eingabewert festgelegt. Mögliche Operatoren : *, x, /, :, +, - Eingabebeispiele : *25.23, +10, /13.50, -33.333 Viel Spaß damit, ich hoffe ich hab nichts vergessen. ------------------ Roland [Diese Nachricht wurde von RoSiNiNo am 21. August 2002 editier ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Text - Lisp
RoSiNiNo am 21.08.2002 um 12:53 Uhr (0)
Einfach die Datei nochmmal herunterladen, oder folgenden Text hinten anfügen. Code: Ersetzt Komma durch Punkt Public Function funPunkt(Wert) Dim Punkt As Long Dim Komma As Long Wert = LTrim(Wert) Komma = InStr(Wert, ",") If Komma 0 Then Mid(Wert, Komma) = "." Punkt = InStr(Wert, ".") If Punkt = 1 Then Wert = "0" & Wert funPunkt = Wert End Function Wenn anstelle des Dezimalpunktes ein Komma stehen soll, dann die Zeile die den Fehler verursacht hat mit dies ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Automatisches Nummerieren möglich?
RoSiNiNo am 22.08.2002 um 13:10 Uhr (0)
Es sollten auch keine Probleme aufteten. Man kann anstelle der RoSiNiNo.cmd die mit acaddoc.lsp geladen wird auch das Menü wie folgt ändern. Der Nachteil, man kann den Befehl nicht mir RETURN wiederhohlen. Der Vorteil, man braucht die oben genannten Dateien nicht mehr. Code: // // AutoCAD menu file - C:ProgrammeACAD2002BlockNumm.mnc // ***MENUGROUP=BLOCK ***TOOLBARS **BLOCK ID_BLOCK_0 [_Toolbar("Block: allgemein", _Floating, _Show, 150, 150, 1)] ID_MstSet [_Button("Maßstab setzten", "MstSe ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Automatisches Nummerieren möglich?
RoSiNiNo am 23.08.2002 um 07:03 Uhr (0)
Hallo Daniel, Zitat: Original erstellt von danglover: Warum bricht der Befehl (beim Einfügen der Symbole) beim Zoomen ab obwohl der Zoombefehl Transparent ausgeführt wird? Es stimmt das der Zoombefehl, auch wenn er transparent ausgeführt wird, den Befehl abbricht. Dieses Problem ist uns auch schon aufgefallen, tritt aber nur auf wenn du den Zoombefehl mit dem Werkzeugkasten aufrufst. Da ich aber kaum die Werkzeugkästen von ACAD verwende, ich solche Befehle mit den Kürzeln aufrufe, habe ich keine P ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : eps-Datei
RoSiNiNo am 12.09.2002 um 08:06 Uhr (0)
Zitat: Original erstellt von bwp: Kann man im Layout-Bereich eine schattierte Ansicht in eine eps-Datei umwandeln, sodaß die Schattierung erhalten bleibt und wenn ja, wie? Hallo bwp, hast du ein 3d-Modell? wenn ja, dann geht das schon, es gibt eine Variable die umgestellt werden muß. Steht aber im Handbuch, bzw. in der Hilfe-Datei. Ich habe zumindest schon mal 3D-Objekte mit verdeckten Linien ausgedruckt. Solltest du nicht fündig werden, teile er mir einfach mit, dann such ich es nocheinmal. ----- ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : DLL - registrieren
RoSiNiNo am 25.09.2002 um 08:30 Uhr (0)
Hallo, wie kann man eigentlich eine dll-Datei registrieren und dann in ein VBA-Projekt einfügen? ------------------ Roland
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Schraffuren bei Blöcken
RoSiNiNo am 26.09.2002 um 14:41 Uhr (0)
Zitat: Original erstellt von Hetkala: Ich hatte ja eigentlich gehofft, es gäbe irgendeine geheime Systemvariable, die mir weiterhelfen kann aber gibt s wohl nicht - schnüff schnüff. Da hast du mich falsch verstanden, nicht in die Zeichnung in der das Xref drinnen ist einfügen, in das so genannte Xref hinein. Das Xref öffnen, einen WBlock erstellen (alle Element wählen), dann die soeben hinausgeschriebenen Elemente wieder einfügen (in die Xref-Datei!!!). Alles klar ------------------ Roland
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Linien -> Polylinien automatisch
RoSiNiNo am 02.10.2002 um 07:59 Uhr (0)
Zitat: Original erstellt von Tblaenky: aus Luftbildern erzeugte Datei enthält 2D-Polylinien, Linien ... Mit Acad2002 kein Problem. Einfach PEDIT aufrufen, O für mehrere Objekte, alle Objekte die verbunden werden sollen wählen, die eventuell folgende Frage mit JA bestätigen, V für verbinden. Das war s. ------------------ Roland
| | In das Form Rund um Autocad wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
